home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / c / mc302emb.zip / LIBCF / STRING2.ASM < prev    next >
Assembly Source File  |  1994-03-18  |  262b  |  12 lines
  1. *
  2. * Determine length of string: strlen(string)
  3. *
  4. strlen    LDI    2,S        ; Get string ptr
  5. ?1    LDB    I        ; Get byte from string
  6.     JZ    ?2        ; We are at end
  7.     LEAI    1,I        ; Skip to next
  8.     SJMP    ?1        ; And proceed
  9. ?2    TIA            ; Get pointer
  10.     SUB    2,S        ; Compute actual length
  11.     RET
  12.